<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span class="hs-comment">-- | Constants describing the DWARF format. Most of this simply</span><span>
</span><span id="line-2"></span><span class="hs-comment">-- mirrors \/usr\/include\/dwarf.h.</span><span>
</span><span id="line-3"></span><span>
</span><span id="line-4"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">GHC.CmmToAsm.Dwarf.Constants</span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-5"></span><span>
</span><span id="line-6"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Prelude.html"><span class="hs-identifier">GHC.Prelude</span></a></span><span>
</span><span id="line-7"></span><span>
</span><span id="line-8"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Utils.Asm.html"><span class="hs-identifier">GHC.Utils.Asm</span></a></span><span>
</span><span id="line-9"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Data.FastString.html"><span class="hs-identifier">GHC.Data.FastString</span></a></span><span>
</span><span id="line-10"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="../../ghc-boot/src/GHC.Platform.html#"><span class="hs-identifier">GHC.Platform</span></a></span><span>
</span><span id="line-11"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html"><span class="hs-identifier">GHC.Utils.Outputable</span></a></span><span>
</span><span id="line-12"></span><span>
</span><span id="line-13"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Platform.Reg.html"><span class="hs-identifier">GHC.Platform.Reg</span></a></span><span>
</span><span id="line-14"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.X86.Regs.html"><span class="hs-identifier">GHC.CmmToAsm.X86.Regs</span></a></span><span>
</span><span id="line-15"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.PPC.Regs.html"><span class="hs-identifier">GHC.CmmToAsm.PPC.Regs</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.CmmToAsm.PPC.Regs.html#toRegNo"><span class="hs-identifier">toRegNo</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-16"></span><span>
</span><span id="line-17"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="../../base/src/Data.Word.html#"><span class="hs-identifier">Data.Word</span></a></span><span>
</span><span id="line-18"></span><span>
</span><span id="line-19"></span><span class="hs-comment">-- | Language ID used for Haskell.</span><span>
</span><span id="line-20"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_LANG_Haskell"><span class="hs-identifier hs-type">dW_LANG_Haskell</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-21"></span><span id="dW_LANG_Haskell"><span class="annot"><span class="annottext">dW_LANG_Haskell :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_LANG_Haskell"><span class="hs-identifier hs-var hs-var">dW_LANG_Haskell</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x18</span></span><span>
</span><span id="line-22"></span><span>  </span><span class="hs-comment">-- Thanks to Nathan Howell for getting us our very own language ID!</span><span>
</span><span id="line-23"></span><span>
</span><span id="line-24"></span><span class="hs-comment">-- * Dwarf tags</span><span>
</span><span id="line-25"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_compile_unit"><span class="hs-identifier hs-type">dW_TAG_compile_unit</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_subroutine_type"><span class="hs-identifier hs-type">dW_TAG_subroutine_type</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-26"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_file_type"><span class="hs-identifier hs-type">dW_TAG_file_type</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_subprogram"><span class="hs-identifier hs-type">dW_TAG_subprogram</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_lexical_block"><span class="hs-identifier hs-type">dW_TAG_lexical_block</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-27"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_base_type"><span class="hs-identifier hs-type">dW_TAG_base_type</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_structure_type"><span class="hs-identifier hs-type">dW_TAG_structure_type</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_pointer_type"><span class="hs-identifier hs-type">dW_TAG_pointer_type</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-28"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_array_type"><span class="hs-identifier hs-type">dW_TAG_array_type</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_subrange_type"><span class="hs-identifier hs-type">dW_TAG_subrange_type</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_typedef"><span class="hs-identifier hs-type">dW_TAG_typedef</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-29"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_variable"><span class="hs-identifier hs-type">dW_TAG_variable</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_arg_variable"><span class="hs-identifier hs-type">dW_TAG_arg_variable</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_auto_variable"><span class="hs-identifier hs-type">dW_TAG_auto_variable</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-30"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_ghc_src_note"><span class="hs-identifier hs-type">dW_TAG_ghc_src_note</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-31"></span><span id="dW_TAG_array_type"><span class="annot"><span class="annottext">dW_TAG_array_type :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_array_type"><span class="hs-identifier hs-var hs-var">dW_TAG_array_type</span></a></span></span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-32"></span><span id="dW_TAG_lexical_block"><span class="annot"><span class="annottext">dW_TAG_lexical_block :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_lexical_block"><span class="hs-identifier hs-var hs-var">dW_TAG_lexical_block</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">11</span></span><span>
</span><span id="line-33"></span><span id="dW_TAG_pointer_type"><span class="annot"><span class="annottext">dW_TAG_pointer_type :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_pointer_type"><span class="hs-identifier hs-var hs-var">dW_TAG_pointer_type</span></a></span></span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">15</span></span><span>
</span><span id="line-34"></span><span id="dW_TAG_compile_unit"><span class="annot"><span class="annottext">dW_TAG_compile_unit :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_compile_unit"><span class="hs-identifier hs-var hs-var">dW_TAG_compile_unit</span></a></span></span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">17</span></span><span>
</span><span id="line-35"></span><span id="dW_TAG_structure_type"><span class="annot"><span class="annottext">dW_TAG_structure_type :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_structure_type"><span class="hs-identifier hs-var hs-var">dW_TAG_structure_type</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">19</span></span><span>
</span><span id="line-36"></span><span id="dW_TAG_typedef"><span class="annot"><span class="annottext">dW_TAG_typedef :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_typedef"><span class="hs-identifier hs-var hs-var">dW_TAG_typedef</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">22</span></span><span>
</span><span id="line-37"></span><span id="dW_TAG_subroutine_type"><span class="annot"><span class="annottext">dW_TAG_subroutine_type :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_subroutine_type"><span class="hs-identifier hs-var hs-var">dW_TAG_subroutine_type</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">32</span></span><span>
</span><span id="line-38"></span><span id="dW_TAG_subrange_type"><span class="annot"><span class="annottext">dW_TAG_subrange_type :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_subrange_type"><span class="hs-identifier hs-var hs-var">dW_TAG_subrange_type</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">33</span></span><span>
</span><span id="line-39"></span><span id="dW_TAG_base_type"><span class="annot"><span class="annottext">dW_TAG_base_type :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_base_type"><span class="hs-identifier hs-var hs-var">dW_TAG_base_type</span></a></span></span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">36</span></span><span>
</span><span id="line-40"></span><span id="dW_TAG_file_type"><span class="annot"><span class="annottext">dW_TAG_file_type :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_file_type"><span class="hs-identifier hs-var hs-var">dW_TAG_file_type</span></a></span></span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">41</span></span><span>
</span><span id="line-41"></span><span id="dW_TAG_subprogram"><span class="annot"><span class="annottext">dW_TAG_subprogram :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_subprogram"><span class="hs-identifier hs-var hs-var">dW_TAG_subprogram</span></a></span></span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">46</span></span><span>
</span><span id="line-42"></span><span id="dW_TAG_variable"><span class="annot"><span class="annottext">dW_TAG_variable :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_variable"><span class="hs-identifier hs-var hs-var">dW_TAG_variable</span></a></span></span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">52</span></span><span>
</span><span id="line-43"></span><span id="dW_TAG_auto_variable"><span class="annot"><span class="annottext">dW_TAG_auto_variable :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_auto_variable"><span class="hs-identifier hs-var hs-var">dW_TAG_auto_variable</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">256</span></span><span>
</span><span id="line-44"></span><span id="dW_TAG_arg_variable"><span class="annot"><span class="annottext">dW_TAG_arg_variable :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_arg_variable"><span class="hs-identifier hs-var hs-var">dW_TAG_arg_variable</span></a></span></span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">257</span></span><span>
</span><span id="line-45"></span><span>
</span><span id="line-46"></span><span id="dW_TAG_ghc_src_note"><span class="annot"><span class="annottext">dW_TAG_ghc_src_note :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_TAG_ghc_src_note"><span class="hs-identifier hs-var hs-var">dW_TAG_ghc_src_note</span></a></span></span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x5b00</span></span><span>
</span><span id="line-47"></span><span>
</span><span id="line-48"></span><span class="hs-comment">-- * Dwarf attributes</span><span>
</span><span id="line-49"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_name"><span class="hs-identifier hs-type">dW_AT_name</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_stmt_list"><span class="hs-identifier hs-type">dW_AT_stmt_list</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_low_pc"><span class="hs-identifier hs-type">dW_AT_low_pc</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_high_pc"><span class="hs-identifier hs-type">dW_AT_high_pc</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_language"><span class="hs-identifier hs-type">dW_AT_language</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-50"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_comp_dir"><span class="hs-identifier hs-type">dW_AT_comp_dir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_producer"><span class="hs-identifier hs-type">dW_AT_producer</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_external"><span class="hs-identifier hs-type">dW_AT_external</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_frame_base"><span class="hs-identifier hs-type">dW_AT_frame_base</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-51"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_use_UTF8"><span class="hs-identifier hs-type">dW_AT_use_UTF8</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_MIPS_linkage_name"><span class="hs-identifier hs-type">dW_AT_MIPS_linkage_name</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-52"></span><span id="dW_AT_name"><span class="annot"><span class="annottext">dW_AT_name :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_name"><span class="hs-identifier hs-var hs-var">dW_AT_name</span></a></span></span><span>              </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x03</span></span><span>
</span><span id="line-53"></span><span id="dW_AT_stmt_list"><span class="annot"><span class="annottext">dW_AT_stmt_list :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_stmt_list"><span class="hs-identifier hs-var hs-var">dW_AT_stmt_list</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x10</span></span><span>
</span><span id="line-54"></span><span id="dW_AT_low_pc"><span class="annot"><span class="annottext">dW_AT_low_pc :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_low_pc"><span class="hs-identifier hs-var hs-var">dW_AT_low_pc</span></a></span></span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x11</span></span><span>
</span><span id="line-55"></span><span id="dW_AT_high_pc"><span class="annot"><span class="annottext">dW_AT_high_pc :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_high_pc"><span class="hs-identifier hs-var hs-var">dW_AT_high_pc</span></a></span></span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x12</span></span><span>
</span><span id="line-56"></span><span id="dW_AT_language"><span class="annot"><span class="annottext">dW_AT_language :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_language"><span class="hs-identifier hs-var hs-var">dW_AT_language</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x13</span></span><span>
</span><span id="line-57"></span><span id="dW_AT_comp_dir"><span class="annot"><span class="annottext">dW_AT_comp_dir :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_comp_dir"><span class="hs-identifier hs-var hs-var">dW_AT_comp_dir</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x1b</span></span><span>
</span><span id="line-58"></span><span id="dW_AT_producer"><span class="annot"><span class="annottext">dW_AT_producer :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_producer"><span class="hs-identifier hs-var hs-var">dW_AT_producer</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x25</span></span><span>
</span><span id="line-59"></span><span id="dW_AT_external"><span class="annot"><span class="annottext">dW_AT_external :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_external"><span class="hs-identifier hs-var hs-var">dW_AT_external</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x3f</span></span><span>
</span><span id="line-60"></span><span id="dW_AT_frame_base"><span class="annot"><span class="annottext">dW_AT_frame_base :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_frame_base"><span class="hs-identifier hs-var hs-var">dW_AT_frame_base</span></a></span></span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x40</span></span><span>
</span><span id="line-61"></span><span id="dW_AT_use_UTF8"><span class="annot"><span class="annottext">dW_AT_use_UTF8 :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_use_UTF8"><span class="hs-identifier hs-var hs-var">dW_AT_use_UTF8</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x53</span></span><span>
</span><span id="line-62"></span><span id="dW_AT_MIPS_linkage_name"><span class="annot"><span class="annottext">dW_AT_MIPS_linkage_name :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_MIPS_linkage_name"><span class="hs-identifier hs-var hs-var">dW_AT_MIPS_linkage_name</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x2007</span></span><span>
</span><span id="line-63"></span><span>
</span><span id="line-64"></span><span class="hs-comment">-- * Custom DWARF attributes</span><span>
</span><span id="line-65"></span><span class="hs-comment">-- Chosen a more or less random section of the vendor-extensible region</span><span>
</span><span id="line-66"></span><span>
</span><span id="line-67"></span><span class="hs-comment">-- ** Describing C-- blocks</span><span>
</span><span id="line-68"></span><span class="hs-comment">-- These appear in DW_TAG_lexical_scope DIEs corresponding to C-- blocks</span><span>
</span><span id="line-69"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_tick_parent"><span class="hs-identifier hs-type">dW_AT_ghc_tick_parent</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-70"></span><span id="dW_AT_ghc_tick_parent"><span class="annot"><span class="annottext">dW_AT_ghc_tick_parent :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_tick_parent"><span class="hs-identifier hs-var hs-var">dW_AT_ghc_tick_parent</span></a></span></span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x2b20</span></span><span>
</span><span id="line-71"></span><span>
</span><span id="line-72"></span><span class="hs-comment">-- ** Describing source notes</span><span>
</span><span id="line-73"></span><span class="hs-comment">-- These appear in DW_TAG_ghc_src_note DIEs</span><span>
</span><span id="line-74"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_file"><span class="hs-identifier hs-type">dW_AT_ghc_span_file</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_start_line"><span class="hs-identifier hs-type">dW_AT_ghc_span_start_line</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-75"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_start_col"><span class="hs-identifier hs-type">dW_AT_ghc_span_start_col</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_end_line"><span class="hs-identifier hs-type">dW_AT_ghc_span_end_line</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-76"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_end_col"><span class="hs-identifier hs-type">dW_AT_ghc_span_end_col</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-77"></span><span id="dW_AT_ghc_span_file"><span class="annot"><span class="annottext">dW_AT_ghc_span_file :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_file"><span class="hs-identifier hs-var hs-var">dW_AT_ghc_span_file</span></a></span></span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x2b00</span></span><span>
</span><span id="line-78"></span><span id="dW_AT_ghc_span_start_line"><span class="annot"><span class="annottext">dW_AT_ghc_span_start_line :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_start_line"><span class="hs-identifier hs-var hs-var">dW_AT_ghc_span_start_line</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x2b01</span></span><span>
</span><span id="line-79"></span><span id="dW_AT_ghc_span_start_col"><span class="annot"><span class="annottext">dW_AT_ghc_span_start_col :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_start_col"><span class="hs-identifier hs-var hs-var">dW_AT_ghc_span_start_col</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x2b02</span></span><span>
</span><span id="line-80"></span><span id="dW_AT_ghc_span_end_line"><span class="annot"><span class="annottext">dW_AT_ghc_span_end_line :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_end_line"><span class="hs-identifier hs-var hs-var">dW_AT_ghc_span_end_line</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x2b03</span></span><span>
</span><span id="line-81"></span><span id="dW_AT_ghc_span_end_col"><span class="annot"><span class="annottext">dW_AT_ghc_span_end_col :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_AT_ghc_span_end_col"><span class="hs-identifier hs-var hs-var">dW_AT_ghc_span_end_col</span></a></span></span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x2b04</span></span><span>
</span><span id="line-82"></span><span>
</span><span id="line-83"></span><span>
</span><span id="line-84"></span><span class="hs-comment">-- * Abbrev declarations</span><span>
</span><span id="line-85"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CHILDREN_no"><span class="hs-identifier hs-type">dW_CHILDREN_no</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CHILDREN_yes"><span class="hs-identifier hs-type">dW_CHILDREN_yes</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word8"><span class="hs-identifier hs-type">Word8</span></a></span><span>
</span><span id="line-86"></span><span id="dW_CHILDREN_no"><span class="annot"><span class="annottext">dW_CHILDREN_no :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CHILDREN_no"><span class="hs-identifier hs-var hs-var">dW_CHILDREN_no</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0</span></span><span>
</span><span id="line-87"></span><span id="dW_CHILDREN_yes"><span class="annot"><span class="annottext">dW_CHILDREN_yes :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CHILDREN_yes"><span class="hs-identifier hs-var hs-var">dW_CHILDREN_yes</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">1</span></span><span>
</span><span id="line-88"></span><span>
</span><span id="line-89"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_addr"><span class="hs-identifier hs-type">dW_FORM_addr</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_data2"><span class="hs-identifier hs-type">dW_FORM_data2</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_data4"><span class="hs-identifier hs-type">dW_FORM_data4</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_string"><span class="hs-identifier hs-type">dW_FORM_string</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_flag"><span class="hs-identifier hs-type">dW_FORM_flag</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-90"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_block1"><span class="hs-identifier hs-type">dW_FORM_block1</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_ref4"><span class="hs-identifier hs-type">dW_FORM_ref4</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_ref_addr"><span class="hs-identifier hs-type">dW_FORM_ref_addr</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_flag_present"><span class="hs-identifier hs-type">dW_FORM_flag_present</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-91"></span><span id="dW_FORM_addr"><span class="annot"><span class="annottext">dW_FORM_addr :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_addr"><span class="hs-identifier hs-var hs-var">dW_FORM_addr</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x01</span></span><span>
</span><span id="line-92"></span><span id="dW_FORM_data2"><span class="annot"><span class="annottext">dW_FORM_data2 :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_data2"><span class="hs-identifier hs-var hs-var">dW_FORM_data2</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x05</span></span><span>
</span><span id="line-93"></span><span id="dW_FORM_data4"><span class="annot"><span class="annottext">dW_FORM_data4 :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_data4"><span class="hs-identifier hs-var hs-var">dW_FORM_data4</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x06</span></span><span>
</span><span id="line-94"></span><span id="dW_FORM_string"><span class="annot"><span class="annottext">dW_FORM_string :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_string"><span class="hs-identifier hs-var hs-var">dW_FORM_string</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x08</span></span><span>
</span><span id="line-95"></span><span id="dW_FORM_flag"><span class="annot"><span class="annottext">dW_FORM_flag :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_flag"><span class="hs-identifier hs-var hs-var">dW_FORM_flag</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x0c</span></span><span>
</span><span id="line-96"></span><span id="dW_FORM_block1"><span class="annot"><span class="annottext">dW_FORM_block1 :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_block1"><span class="hs-identifier hs-var hs-var">dW_FORM_block1</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x0a</span></span><span>
</span><span id="line-97"></span><span id="dW_FORM_ref_addr"><span class="annot"><span class="annottext">dW_FORM_ref_addr :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_ref_addr"><span class="hs-identifier hs-var hs-var">dW_FORM_ref_addr</span></a></span></span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x10</span></span><span>
</span><span id="line-98"></span><span id="dW_FORM_ref4"><span class="annot"><span class="annottext">dW_FORM_ref4 :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_ref4"><span class="hs-identifier hs-var hs-var">dW_FORM_ref4</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x13</span></span><span>
</span><span id="line-99"></span><span id="dW_FORM_flag_present"><span class="annot"><span class="annottext">dW_FORM_flag_present :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_FORM_flag_present"><span class="hs-identifier hs-var hs-var">dW_FORM_flag_present</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0x19</span></span><span>
</span><span id="line-100"></span><span>
</span><span id="line-101"></span><span class="hs-comment">-- * Dwarf native types</span><span>
</span><span id="line-102"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_address"><span class="hs-identifier hs-type">dW_ATE_address</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_boolean"><span class="hs-identifier hs-type">dW_ATE_boolean</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_float"><span class="hs-identifier hs-type">dW_ATE_float</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_signed"><span class="hs-identifier hs-type">dW_ATE_signed</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-103"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_signed_char"><span class="hs-identifier hs-type">dW_ATE_signed_char</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_unsigned"><span class="hs-identifier hs-type">dW_ATE_unsigned</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_unsigned_char"><span class="hs-identifier hs-type">dW_ATE_unsigned_char</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-104"></span><span id="dW_ATE_address"><span class="annot"><span class="annottext">dW_ATE_address :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_address"><span class="hs-identifier hs-var hs-var">dW_ATE_address</span></a></span></span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-105"></span><span id="dW_ATE_boolean"><span class="annot"><span class="annottext">dW_ATE_boolean :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_boolean"><span class="hs-identifier hs-var hs-var">dW_ATE_boolean</span></a></span></span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">2</span></span><span>
</span><span id="line-106"></span><span id="dW_ATE_float"><span class="annot"><span class="annottext">dW_ATE_float :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_float"><span class="hs-identifier hs-var hs-var">dW_ATE_float</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">4</span></span><span>
</span><span id="line-107"></span><span id="dW_ATE_signed"><span class="annot"><span class="annottext">dW_ATE_signed :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_signed"><span class="hs-identifier hs-var hs-var">dW_ATE_signed</span></a></span></span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">5</span></span><span>
</span><span id="line-108"></span><span id="dW_ATE_signed_char"><span class="annot"><span class="annottext">dW_ATE_signed_char :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_signed_char"><span class="hs-identifier hs-var hs-var">dW_ATE_signed_char</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">6</span></span><span>
</span><span id="line-109"></span><span id="dW_ATE_unsigned"><span class="annot"><span class="annottext">dW_ATE_unsigned :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_unsigned"><span class="hs-identifier hs-var hs-var">dW_ATE_unsigned</span></a></span></span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">7</span></span><span>
</span><span id="line-110"></span><span id="dW_ATE_unsigned_char"><span class="annot"><span class="annottext">dW_ATE_unsigned_char :: Word
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_ATE_unsigned_char"><span class="hs-identifier hs-var hs-var">dW_ATE_unsigned_char</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">8</span></span><span>
</span><span id="line-111"></span><span>
</span><span id="line-112"></span><span class="hs-comment">-- * Call frame information</span><span>
</span><span id="line-113"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_set_loc"><span class="hs-identifier hs-type">dW_CFA_set_loc</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_undefined"><span class="hs-identifier hs-type">dW_CFA_undefined</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_same_value"><span class="hs-identifier hs-type">dW_CFA_same_value</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-114"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa"><span class="hs-identifier hs-type">dW_CFA_def_cfa</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_offset"><span class="hs-identifier hs-type">dW_CFA_def_cfa_offset</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_expression"><span class="hs-identifier hs-type">dW_CFA_def_cfa_expression</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-115"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_expression"><span class="hs-identifier hs-type">dW_CFA_expression</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_offset_extended_sf"><span class="hs-identifier hs-type">dW_CFA_offset_extended_sf</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_offset_sf"><span class="hs-identifier hs-type">dW_CFA_def_cfa_offset_sf</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-116"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_sf"><span class="hs-identifier hs-type">dW_CFA_def_cfa_sf</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_val_offset"><span class="hs-identifier hs-type">dW_CFA_val_offset</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_val_expression"><span class="hs-identifier hs-type">dW_CFA_val_expression</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-117"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_offset"><span class="hs-identifier hs-type">dW_CFA_offset</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word8"><span class="hs-identifier hs-type">Word8</span></a></span><span>
</span><span id="line-118"></span><span id="dW_CFA_set_loc"><span class="annot"><span class="annottext">dW_CFA_set_loc :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_set_loc"><span class="hs-identifier hs-var hs-var">dW_CFA_set_loc</span></a></span></span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x01</span></span><span>
</span><span id="line-119"></span><span id="dW_CFA_undefined"><span class="annot"><span class="annottext">dW_CFA_undefined :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_undefined"><span class="hs-identifier hs-var hs-var">dW_CFA_undefined</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x07</span></span><span>
</span><span id="line-120"></span><span id="dW_CFA_same_value"><span class="annot"><span class="annottext">dW_CFA_same_value :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_same_value"><span class="hs-identifier hs-var hs-var">dW_CFA_same_value</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x08</span></span><span>
</span><span id="line-121"></span><span id="dW_CFA_def_cfa"><span class="annot"><span class="annottext">dW_CFA_def_cfa :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa"><span class="hs-identifier hs-var hs-var">dW_CFA_def_cfa</span></a></span></span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x0c</span></span><span>
</span><span id="line-122"></span><span id="dW_CFA_def_cfa_offset"><span class="annot"><span class="annottext">dW_CFA_def_cfa_offset :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_offset"><span class="hs-identifier hs-var hs-var">dW_CFA_def_cfa_offset</span></a></span></span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x0e</span></span><span>
</span><span id="line-123"></span><span id="dW_CFA_def_cfa_expression"><span class="annot"><span class="annottext">dW_CFA_def_cfa_expression :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_expression"><span class="hs-identifier hs-var hs-var">dW_CFA_def_cfa_expression</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x0f</span></span><span>
</span><span id="line-124"></span><span id="dW_CFA_expression"><span class="annot"><span class="annottext">dW_CFA_expression :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_expression"><span class="hs-identifier hs-var hs-var">dW_CFA_expression</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x10</span></span><span>
</span><span id="line-125"></span><span id="dW_CFA_offset_extended_sf"><span class="annot"><span class="annottext">dW_CFA_offset_extended_sf :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_offset_extended_sf"><span class="hs-identifier hs-var hs-var">dW_CFA_offset_extended_sf</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x11</span></span><span>
</span><span id="line-126"></span><span id="dW_CFA_def_cfa_sf"><span class="annot"><span class="annottext">dW_CFA_def_cfa_sf :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_sf"><span class="hs-identifier hs-var hs-var">dW_CFA_def_cfa_sf</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x12</span></span><span>
</span><span id="line-127"></span><span id="dW_CFA_def_cfa_offset_sf"><span class="annot"><span class="annottext">dW_CFA_def_cfa_offset_sf :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_def_cfa_offset_sf"><span class="hs-identifier hs-var hs-var">dW_CFA_def_cfa_offset_sf</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x13</span></span><span>
</span><span id="line-128"></span><span id="dW_CFA_val_offset"><span class="annot"><span class="annottext">dW_CFA_val_offset :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_val_offset"><span class="hs-identifier hs-var hs-var">dW_CFA_val_offset</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x14</span></span><span>
</span><span id="line-129"></span><span id="dW_CFA_val_expression"><span class="annot"><span class="annottext">dW_CFA_val_expression :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_val_expression"><span class="hs-identifier hs-var hs-var">dW_CFA_val_expression</span></a></span></span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x16</span></span><span>
</span><span id="line-130"></span><span id="dW_CFA_offset"><span class="annot"><span class="annottext">dW_CFA_offset :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_CFA_offset"><span class="hs-identifier hs-var hs-var">dW_CFA_offset</span></a></span></span><span>             </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x80</span></span><span>
</span><span id="line-131"></span><span>
</span><span id="line-132"></span><span class="hs-comment">-- * Operations</span><span>
</span><span id="line-133"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_addr"><span class="hs-identifier hs-type">dW_OP_addr</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_deref"><span class="hs-identifier hs-type">dW_OP_deref</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_consts"><span class="hs-identifier hs-type">dW_OP_consts</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-134"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_minus"><span class="hs-identifier hs-type">dW_OP_minus</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_mul"><span class="hs-identifier hs-type">dW_OP_mul</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_plus"><span class="hs-identifier hs-type">dW_OP_plus</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-135"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_lit0"><span class="hs-identifier hs-type">dW_OP_lit0</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_breg0"><span class="hs-identifier hs-type">dW_OP_breg0</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_call_frame_cfa"><span class="hs-identifier hs-type">dW_OP_call_frame_cfa</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word8"><span class="hs-identifier hs-type">Word8</span></a></span><span>
</span><span id="line-136"></span><span id="dW_OP_addr"><span class="annot"><span class="annottext">dW_OP_addr :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_addr"><span class="hs-identifier hs-var hs-var">dW_OP_addr</span></a></span></span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x03</span></span><span>
</span><span id="line-137"></span><span id="dW_OP_deref"><span class="annot"><span class="annottext">dW_OP_deref :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_deref"><span class="hs-identifier hs-var hs-var">dW_OP_deref</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x06</span></span><span>
</span><span id="line-138"></span><span id="dW_OP_consts"><span class="annot"><span class="annottext">dW_OP_consts :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_consts"><span class="hs-identifier hs-var hs-var">dW_OP_consts</span></a></span></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x11</span></span><span>
</span><span id="line-139"></span><span id="dW_OP_minus"><span class="annot"><span class="annottext">dW_OP_minus :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_minus"><span class="hs-identifier hs-var hs-var">dW_OP_minus</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x1c</span></span><span>
</span><span id="line-140"></span><span id="dW_OP_mul"><span class="annot"><span class="annottext">dW_OP_mul :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_mul"><span class="hs-identifier hs-var hs-var">dW_OP_mul</span></a></span></span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x1e</span></span><span>
</span><span id="line-141"></span><span id="dW_OP_plus"><span class="annot"><span class="annottext">dW_OP_plus :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_plus"><span class="hs-identifier hs-var hs-var">dW_OP_plus</span></a></span></span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x22</span></span><span>
</span><span id="line-142"></span><span id="dW_OP_lit0"><span class="annot"><span class="annottext">dW_OP_lit0 :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_lit0"><span class="hs-identifier hs-var hs-var">dW_OP_lit0</span></a></span></span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x30</span></span><span>
</span><span id="line-143"></span><span id="dW_OP_breg0"><span class="annot"><span class="annottext">dW_OP_breg0 :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_breg0"><span class="hs-identifier hs-var hs-var">dW_OP_breg0</span></a></span></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x70</span></span><span>
</span><span id="line-144"></span><span id="dW_OP_call_frame_cfa"><span class="annot"><span class="annottext">dW_OP_call_frame_cfa :: Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dW_OP_call_frame_cfa"><span class="hs-identifier hs-var hs-var">dW_OP_call_frame_cfa</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0x9c</span></span><span>
</span><span id="line-145"></span><span>
</span><span id="line-146"></span><span class="hs-comment">-- * Dwarf section declarations</span><span>
</span><span id="line-147"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfInfoSection"><span class="hs-identifier hs-type">dwarfInfoSection</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfAbbrevSection"><span class="hs-identifier hs-type">dwarfAbbrevSection</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfLineSection"><span class="hs-identifier hs-type">dwarfLineSection</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-148"></span><span>  </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfFrameSection"><span class="hs-identifier hs-type">dwarfFrameSection</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfGhcSection"><span class="hs-identifier hs-type">dwarfGhcSection</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfARangesSection"><span class="hs-identifier hs-type">dwarfARangesSection</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../ghc-boot/src/GHC.Platform.html#Platform"><span class="hs-identifier hs-type">Platform</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html#SDoc"><span class="hs-identifier hs-type">SDoc</span></a></span><span>
</span><span id="line-149"></span><span id="dwarfInfoSection"><span class="annot"><span class="annottext">dwarfInfoSection :: Platform -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfInfoSection"><span class="hs-identifier hs-var hs-var">dwarfInfoSection</span></a></span></span><span>    </span><span id="local-6989586621681009804"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009804"><span class="hs-identifier hs-var">platform</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; String -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-var">dwarfSection</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009804"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;info&quot;</span></span><span>
</span><span id="line-150"></span><span id="dwarfAbbrevSection"><span class="annot"><span class="annottext">dwarfAbbrevSection :: Platform -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfAbbrevSection"><span class="hs-identifier hs-var hs-var">dwarfAbbrevSection</span></a></span></span><span>  </span><span id="local-6989586621681009802"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009802"><span class="hs-identifier hs-var">platform</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; String -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-var">dwarfSection</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009802"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;abbrev&quot;</span></span><span>
</span><span id="line-151"></span><span id="dwarfLineSection"><span class="annot"><span class="annottext">dwarfLineSection :: Platform -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfLineSection"><span class="hs-identifier hs-var hs-var">dwarfLineSection</span></a></span></span><span>    </span><span id="local-6989586621681009801"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009801"><span class="hs-identifier hs-var">platform</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; String -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-var">dwarfSection</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009801"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;line&quot;</span></span><span>
</span><span id="line-152"></span><span id="dwarfFrameSection"><span class="annot"><span class="annottext">dwarfFrameSection :: Platform -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfFrameSection"><span class="hs-identifier hs-var hs-var">dwarfFrameSection</span></a></span></span><span>   </span><span id="local-6989586621681009800"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009800"><span class="hs-identifier hs-var">platform</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; String -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-var">dwarfSection</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009800"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;frame&quot;</span></span><span>
</span><span id="line-153"></span><span id="dwarfGhcSection"><span class="annot"><span class="annottext">dwarfGhcSection :: Platform -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfGhcSection"><span class="hs-identifier hs-var hs-var">dwarfGhcSection</span></a></span></span><span>     </span><span id="local-6989586621681009799"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009799"><span class="hs-identifier hs-var">platform</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; String -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-var">dwarfSection</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009799"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ghc&quot;</span></span><span>
</span><span id="line-154"></span><span id="dwarfARangesSection"><span class="annot"><span class="annottext">dwarfARangesSection :: Platform -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfARangesSection"><span class="hs-identifier hs-var hs-var">dwarfARangesSection</span></a></span></span><span> </span><span id="local-6989586621681009798"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009798"><span class="hs-identifier hs-var">platform</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; String -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-var">dwarfSection</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009798"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;aranges&quot;</span></span><span>
</span><span id="line-155"></span><span>
</span><span id="line-156"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-type">dwarfSection</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../ghc-boot/src/GHC.Platform.html#Platform"><span class="hs-identifier hs-type">Platform</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html#SDoc"><span class="hs-identifier hs-type">SDoc</span></a></span><span>
</span><span id="line-157"></span><span id="dwarfSection"><span class="annot"><span class="annottext">dwarfSection :: Platform -&gt; String -&gt; SDoc
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfSection"><span class="hs-identifier hs-var hs-var">dwarfSection</span></a></span></span><span> </span><span id="local-6989586621681009797"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009797"><span class="hs-identifier hs-var">platform</span></a></span></span><span> </span><span id="local-6989586621681009796"><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621681009796"><span class="hs-identifier hs-var">name</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-158"></span><span>  </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; OS
</span><a href="../../ghc-boot/src/GHC.Platform.html#platformOS"><span class="hs-identifier hs-var">platformOS</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009797"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-159"></span><span>    </span><span id="local-6989586621681009794"><span class="annot"><span class="annottext">OS
</span><a href="#local-6989586621681009794"><span class="hs-identifier hs-var">os</span></a></span></span><span> </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">OS -&gt; Bool
</span><a href="../../ghc-boot/src/GHC.Platform.html#osElfTarget"><span class="hs-identifier hs-var">osElfTarget</span></a></span><span> </span><span class="annot"><span class="annottext">OS
</span><a href="#local-6989586621681009794"><span class="hs-identifier hs-var">os</span></a></span><span>
</span><span id="line-160"></span><span>       </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;\t.section .debug_&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621681009796"><span class="hs-identifier hs-var">name</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;,\&quot;\&quot;,&quot;</span></span><span>
</span><span id="line-161"></span><span>          </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Platform -&gt; String -&gt; SDoc
</span><a href="GHC.Utils.Asm.html#sectionType"><span class="hs-identifier hs-var">sectionType</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009797"><span class="hs-identifier hs-var">platform</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;progbits&quot;</span></span><span>
</span><span id="line-162"></span><span>       </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">OS -&gt; Bool
</span><a href="../../ghc-boot/src/GHC.Platform.html#osMachOTarget"><span class="hs-identifier hs-var">osMachOTarget</span></a></span><span> </span><span class="annot"><span class="annottext">OS
</span><a href="#local-6989586621681009794"><span class="hs-identifier hs-var">os</span></a></span><span>
</span><span id="line-163"></span><span>       </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;\t.section __DWARF,__debug_&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621681009796"><span class="hs-identifier hs-var">name</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;,regular,debug&quot;</span></span><span>
</span><span id="line-164"></span><span>       </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Bool
</span><a href="../../base/src/GHC.Base.html#otherwise"><span class="hs-identifier hs-var">otherwise</span></a></span><span>
</span><span id="line-165"></span><span>       </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;\t.section .debug_&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621681009796"><span class="hs-identifier hs-var">name</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;,\&quot;dr\&quot;&quot;</span></span><span>
</span><span id="line-166"></span><span>
</span><span id="line-167"></span><span class="hs-comment">-- * Dwarf section labels</span><span>
</span><span id="line-168"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfInfoLabel"><span class="hs-identifier hs-type">dwarfInfoLabel</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfAbbrevLabel"><span class="hs-identifier hs-type">dwarfAbbrevLabel</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfLineLabel"><span class="hs-identifier hs-type">dwarfLineLabel</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfFrameLabel"><span class="hs-identifier hs-type">dwarfFrameLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Data.FastString.html#PtrString"><span class="hs-identifier hs-type">PtrString</span></a></span><span>
</span><span id="line-169"></span><span id="dwarfInfoLabel"><span class="annot"><span class="annottext">dwarfInfoLabel :: PtrString
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfInfoLabel"><span class="hs-identifier hs-var hs-var">dwarfInfoLabel</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; PtrString
</span><a href="GHC.Data.FastString.html#sLit"><span class="hs-identifier hs-var">sLit</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;.Lsection_info&quot;</span></span><span>
</span><span id="line-170"></span><span id="dwarfAbbrevLabel"><span class="annot"><span class="annottext">dwarfAbbrevLabel :: PtrString
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfAbbrevLabel"><span class="hs-identifier hs-var hs-var">dwarfAbbrevLabel</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; PtrString
</span><a href="GHC.Data.FastString.html#sLit"><span class="hs-identifier hs-var">sLit</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;.Lsection_abbrev&quot;</span></span><span>
</span><span id="line-171"></span><span id="dwarfLineLabel"><span class="annot"><span class="annottext">dwarfLineLabel :: PtrString
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfLineLabel"><span class="hs-identifier hs-var hs-var">dwarfLineLabel</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; PtrString
</span><a href="GHC.Data.FastString.html#sLit"><span class="hs-identifier hs-var">sLit</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;.Lsection_line&quot;</span></span><span>
</span><span id="line-172"></span><span id="dwarfFrameLabel"><span class="annot"><span class="annottext">dwarfFrameLabel :: PtrString
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfFrameLabel"><span class="hs-identifier hs-var hs-var">dwarfFrameLabel</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; PtrString
</span><a href="GHC.Data.FastString.html#sLit"><span class="hs-identifier hs-var">sLit</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;.Lsection_frame&quot;</span></span><span>
</span><span id="line-173"></span><span>
</span><span id="line-174"></span><span class="hs-comment">-- | Mapping of registers to DWARF register numbers</span><span>
</span><span id="line-175"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfRegNo"><span class="hs-identifier hs-type">dwarfRegNo</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../ghc-boot/src/GHC.Platform.html#Platform"><span class="hs-identifier hs-type">Platform</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="GHC.Platform.Reg.html#Reg"><span class="hs-identifier hs-type">Reg</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word8"><span class="hs-identifier hs-type">Word8</span></a></span><span>
</span><span id="line-176"></span><span id="dwarfRegNo"><span class="annot"><span class="annottext">dwarfRegNo :: Platform -&gt; Reg -&gt; Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfRegNo"><span class="hs-identifier hs-var hs-var">dwarfRegNo</span></a></span></span><span> </span><span id="local-6989586621681009782"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009782"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span id="local-6989586621681009781"><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; Arch
</span><a href="../../ghc-boot/src/GHC.Platform.html#platformArch"><span class="hs-identifier hs-var">platformArch</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009782"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-177"></span><span>  </span><span class="annot"><span class="annottext">Arch
</span><a href="../../ghc-boot/src/GHC.Platform.html#ArchX86"><span class="hs-identifier hs-var">ArchX86</span></a></span><span>
</span><span id="line-178"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#eax"><span class="hs-identifier hs-var">eax</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0</span></span><span>
</span><span id="line-179"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#ecx"><span class="hs-identifier hs-var">ecx</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- yes, no typo</span><span>
</span><span id="line-180"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#edx"><span class="hs-identifier hs-var">edx</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">2</span></span><span>
</span><span id="line-181"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#ebx"><span class="hs-identifier hs-var">ebx</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">3</span></span><span>
</span><span id="line-182"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#esp"><span class="hs-identifier hs-var">esp</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">4</span></span><span>
</span><span id="line-183"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#ebp"><span class="hs-identifier hs-var">ebp</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">5</span></span><span>
</span><span id="line-184"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#esi"><span class="hs-identifier hs-var">esi</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">6</span></span><span>
</span><span id="line-185"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#edi"><span class="hs-identifier hs-var">edi</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">7</span></span><span>
</span><span id="line-186"></span><span>  </span><span class="annot"><span class="annottext">Arch
</span><a href="../../ghc-boot/src/GHC.Platform.html#ArchX86_64"><span class="hs-identifier hs-var">ArchX86_64</span></a></span><span>
</span><span id="line-187"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rax"><span class="hs-identifier hs-var">rax</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">0</span></span><span>
</span><span id="line-188"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rdx"><span class="hs-identifier hs-var">rdx</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">1</span></span><span> </span><span class="hs-comment">-- this neither. The order GCC allocates registers in?</span><span>
</span><span id="line-189"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rcx"><span class="hs-identifier hs-var">rcx</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">2</span></span><span>
</span><span id="line-190"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rbx"><span class="hs-identifier hs-var">rbx</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">3</span></span><span>
</span><span id="line-191"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rsi"><span class="hs-identifier hs-var">rsi</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">4</span></span><span>
</span><span id="line-192"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rdi"><span class="hs-identifier hs-var">rdi</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">5</span></span><span>
</span><span id="line-193"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rbp"><span class="hs-identifier hs-var">rbp</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">6</span></span><span>
</span><span id="line-194"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#rsp"><span class="hs-identifier hs-var">rsp</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">7</span></span><span>
</span><span id="line-195"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r8"><span class="hs-identifier hs-var">r8</span></a></span><span>   </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">8</span></span><span>
</span><span id="line-196"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r9"><span class="hs-identifier hs-var">r9</span></a></span><span>   </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">9</span></span><span>
</span><span id="line-197"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r10"><span class="hs-identifier hs-var">r10</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">10</span></span><span>
</span><span id="line-198"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r11"><span class="hs-identifier hs-var">r11</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">11</span></span><span>
</span><span id="line-199"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r12"><span class="hs-identifier hs-var">r12</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">12</span></span><span>
</span><span id="line-200"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r13"><span class="hs-identifier hs-var">r13</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">13</span></span><span>
</span><span id="line-201"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r14"><span class="hs-identifier hs-var">r14</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">14</span></span><span>
</span><span id="line-202"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#r15"><span class="hs-identifier hs-var">r15</span></a></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">15</span></span><span>
</span><span id="line-203"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm0"><span class="hs-identifier hs-var">xmm0</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">17</span></span><span>
</span><span id="line-204"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm1"><span class="hs-identifier hs-var">xmm1</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">18</span></span><span>
</span><span id="line-205"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm2"><span class="hs-identifier hs-var">xmm2</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">19</span></span><span>
</span><span id="line-206"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm3"><span class="hs-identifier hs-var">xmm3</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">20</span></span><span>
</span><span id="line-207"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm4"><span class="hs-identifier hs-var">xmm4</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">21</span></span><span>
</span><span id="line-208"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm5"><span class="hs-identifier hs-var">xmm5</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">22</span></span><span>
</span><span id="line-209"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm6"><span class="hs-identifier hs-var">xmm6</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">23</span></span><span>
</span><span id="line-210"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm7"><span class="hs-identifier hs-var">xmm7</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">24</span></span><span>
</span><span id="line-211"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm8"><span class="hs-identifier hs-var">xmm8</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">25</span></span><span>
</span><span id="line-212"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm9"><span class="hs-identifier hs-var">xmm9</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">26</span></span><span>
</span><span id="line-213"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm10"><span class="hs-identifier hs-var">xmm10</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">27</span></span><span>
</span><span id="line-214"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm11"><span class="hs-identifier hs-var">xmm11</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">28</span></span><span>
</span><span id="line-215"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm12"><span class="hs-identifier hs-var">xmm12</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">29</span></span><span>
</span><span id="line-216"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm13"><span class="hs-identifier hs-var">xmm13</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">30</span></span><span>
</span><span id="line-217"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm14"><span class="hs-identifier hs-var">xmm14</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">31</span></span><span>
</span><span id="line-218"></span><span>    </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; Reg -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="GHC.CmmToAsm.X86.Regs.html#xmm15"><span class="hs-identifier hs-var">xmm15</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">32</span></span><span>
</span><span id="line-219"></span><span>  </span><span class="annot"><a href="../../ghc-boot/src/GHC.Platform.html#ArchPPC_64"><span class="hs-identifier hs-type">ArchPPC_64</span></a></span><span> </span><span class="annot"><span class="annottext">PPC_64ABI
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">RegNo -&gt; Word8
forall a b. (Integral a, Num b) =&gt; a -&gt; b
</span><a href="../../base/src/GHC.Real.html#fromIntegral"><span class="hs-identifier hs-var">fromIntegral</span></a></span><span> </span><span class="annot"><span class="annottext">(RegNo -&gt; Word8) -&gt; RegNo -&gt; Word8
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><a href="../../base/src/GHC.Base.html#%24"><span class="hs-operator hs-var">$</span></a></span><span> </span><span class="annot"><span class="annottext">Reg -&gt; RegNo
</span><a href="GHC.CmmToAsm.PPC.Regs.html#toRegNo"><span class="hs-identifier hs-var">toRegNo</span></a></span><span> </span><span class="annot"><span class="annottext">Reg
</span><a href="#local-6989586621681009781"><span class="hs-identifier hs-var">r</span></a></span><span>
</span><span id="line-220"></span><span>  </span><span id="local-6989586621681009736"><span class="annot"><span class="annottext">Arch
</span><a href="#local-6989586621681009736"><span class="hs-identifier hs-var">_other</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; Word8
forall a. HasCallStack =&gt; String -&gt; a
</span><a href="../../base/src/GHC.Err.html#error"><span class="hs-identifier hs-var">error</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;dwarfRegNo: Unsupported platform or unknown register!&quot;</span></span><span>
</span><span id="line-221"></span><span>
</span><span id="line-222"></span><span class="hs-comment">-- | Virtual register number to use for return address.</span><span>
</span><span id="line-223"></span><span class="annot"><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfReturnRegNo"><span class="hs-identifier hs-type">dwarfReturnRegNo</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../ghc-boot/src/GHC.Platform.html#Platform"><span class="hs-identifier hs-type">Platform</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word8"><span class="hs-identifier hs-type">Word8</span></a></span><span>
</span><span id="line-224"></span><span id="dwarfReturnRegNo"><span class="annot"><span class="annottext">dwarfReturnRegNo :: Platform -&gt; Word8
</span><a href="GHC.CmmToAsm.Dwarf.Constants.html#dwarfReturnRegNo"><span class="hs-identifier hs-var hs-var">dwarfReturnRegNo</span></a></span></span><span> </span><span id="local-6989586621681009733"><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009733"><span class="hs-identifier hs-var">p</span></a></span></span><span>
</span><span id="line-225"></span><span>  </span><span class="hs-comment">-- We &quot;overwrite&quot; IP with our pseudo register - that makes sense, as</span><span>
</span><span id="line-226"></span><span>  </span><span class="hs-comment">-- when using this mechanism gdb already knows the IP anyway. Clang</span><span>
</span><span id="line-227"></span><span>  </span><span class="hs-comment">-- does this too, so it must be safe.</span><span>
</span><span id="line-228"></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Platform -&gt; Arch
</span><a href="../../ghc-boot/src/GHC.Platform.html#platformArch"><span class="hs-identifier hs-var">platformArch</span></a></span><span> </span><span class="annot"><span class="annottext">Platform
</span><a href="#local-6989586621681009733"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-229"></span><span>    </span><span class="annot"><span class="annottext">Arch
</span><a href="../../ghc-boot/src/GHC.Platform.html#ArchX86"><span class="hs-identifier hs-var">ArchX86</span></a></span><span>    </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">8</span></span><span>  </span><span class="hs-comment">-- eip</span><span>
</span><span id="line-230"></span><span>    </span><span class="annot"><span class="annottext">Arch
</span><a href="../../ghc-boot/src/GHC.Platform.html#ArchX86_64"><span class="hs-identifier hs-var">ArchX86_64</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">16</span></span><span> </span><span class="hs-comment">-- rip</span><span>
</span><span id="line-231"></span><span>    </span><span class="annot"><a href="../../ghc-boot/src/GHC.Platform.html#ArchPPC_64"><span class="hs-identifier hs-type">ArchPPC_64</span></a></span><span> </span><span class="annot"><span class="annottext">PPC_64ABI
</span><a href="../../ghc-boot/src/GHC.Platform.html#ELF_V2"><span class="hs-identifier hs-var">ELF_V2</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><span class="hs-number">65</span></span><span> </span><span class="hs-comment">-- lr (link register)</span><span>
</span><span id="line-232"></span><span>    </span><span id="local-6989586621681009731"><span class="annot"><span class="annottext">Arch
</span><a href="#local-6989586621681009731"><span class="hs-identifier hs-var">_other</span></a></span></span><span>     </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; Word8
forall a. HasCallStack =&gt; String -&gt; a
</span><a href="../../base/src/GHC.Err.html#error"><span class="hs-identifier hs-var">error</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;dwarfReturnRegNo: Unsupported platform!&quot;</span></span><span>
</span><span id="line-233"></span></pre></body></html>